Profile of (eval 266)[Sub/Quote.pm:3]

Filename	(eval 266)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
Statements	Executed 168 statements in 546µs
Eval Invoked At	/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
14	1	1	260µs	1.39ms	JSON::Schema::Modern::Document::_set_metaschema_uri
1	1	1	12µs	32µs	JSON::Schema::Modern::Document::BEGIN@7.118
1	1	1	7µs	18µs	Method::Generate::Accessor::_Generated::BEGIN@39.120
1	1	1	6µs	6µs	Method::Generate::Accessor::_Generated::BEGIN@12.119

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					{
2	2	0s			my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
3	1	0s			my $isa_check_for_metaschema_5furi = ${$_[1]->{"\$isa_check_for_metaschema_5furi"}};
4	1	0s			my $coerce_for_metaschema_5furi = ${$_[1]->{"\$coerce_for_metaschema_5furi"}};
5	1	0s			my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
6					package JSON::Schema::Modern::Document;
7	2	54µs	2	52µs	# spent 32µs (12+20) within JSON::Schema::Modern::Document::BEGIN@7.118 which was called: # once (12µs+20µs) by Sub::Quote::_clean_eval at line 7 no warnings 'closure'; # spent 32µs making 1 call to JSON::Schema::Modern::Document::BEGIN@7.118 # spent 20µs making 1 call to warnings::unimport
8					# spent 1.39ms (260µs+1.13) within JSON::Schema::Modern::Document::_set_metaschema_uri which was called 14 times, avg 99µs/call: # 14 times (260µs+1.13ms) by JSON::Schema::Modern::Document::traverse at line 192 of JSON/Schema/Modern/Document.pm, avg 99µs/call sub _set_metaschema_uri {
9					($_QUOTED,$_UNQUOTED) if 0;
10					# BEGIN quote_sub PRELUDE
11					package Method::Generate::Accessor::_Generated;
12					# spent 6µs within Method::Generate::Accessor::_Generated::BEGIN@12.119 which was called: # once (6µs+0s) by Sub::Quote::_clean_eval at line 17 BEGIN {
13	1	1µs			$^H = 1762;
14	1	0s			${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
15	1	4µs			%^H = (
16					);
17	1	85µs	1	6µs	} # spent 6µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@12.119
18					# END quote_sub PRELUDE
19	28	33µs			scalar do { my $value = do {
20	14	55µs			local $Method::Generate::Accessor::CurrentAttribute = {
21					init_arg => undef(),
22					name => "metaschema_uri",
23					step => "coercion",
24					};
25	14	8µs			(my $_return),
26					(my $_error), (my $_old_error = $@);
27	14	5µs			(eval {
28	14	43µs	14	1.10ms	($@ = $_old_error), # spent 1.10ms making 14 calls to JSON::Schema::Modern::Document::__ANON__[JSON/Schema/Modern/Document.pm:45], avg 79µs/call
29					($_return =
30					$coerce_for_metaschema_5furi->($_[1])),
31					1
32					} or
33					$_error = CORE::ref $@ ? $@ : "coercion for \"metaschema_uri\" failed: ".$@);
34	14	7µs			($@ = $_old_error),
35					(defined $_error and CORE::die $_error);
36	14	17µs			$_return;
37					}
38					;
39	30	210µs	30	61µs	# spent 18µs (7+11) within Method::Generate::Accessor::_Generated::BEGIN@39.120 which was called: # once (7µs+11µs) by Sub::Quote::_clean_eval at line 39 (do { no warnings "void"; package Type::Tiny; ((Scalar::Util::blessed($value) and $value->isa(q[Mojo::URL]))) or Type::Tiny::_failed_check($isa_check_for_metaschema_5furi, "InstanceOf[\"Mojo::URL\"]", $value, "attribute_name","metaschema_uri","attribute_step","isa check","mgaca","0","varname","\$self->{\"metaschema_uri\"}"); $value }), # spent 21µs making 14 calls to UNIVERSAL::isa, avg 1µs/call # spent 18µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@39.120 # spent 11µs making 14 calls to Scalar::Util::blessed, avg 786ns/call # spent 11µs making 1 call to warnings::unimport
40					($_[0]->{"metaschema_uri"} = $value),
41	14	17µs			($_[0]->{"metaschema_uri"}),
42					} }
43	1	1µs			$$_UNQUOTED = \&_set_metaschema_uri;
44					}
45	1	6µs			1;
46
47					;